home *** CD-ROM | disk | FTP | other *** search
- on mouseUp
- set wleft to the stageLeft
- set wtop to the stageTop
- set stagedef to rect(wleft, wtop, wleft + 640, wtop + 480)
- set the rect of window "panic" to stagedef
- set the windowType of window "panic" to 3
- open(window "panic")
- pause()
- end
-